home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -in_the_mag- / reader_requests / gmplaygui / gui / getfreq < prev    next >
Text File  |  1997-05-03  |  337b  |  23 lines
  1. set fbak $freq
  2. setenv freq `/requeststring title "GMPlayGUI" body "Enter frequence in Hz:" default $freq`
  3.  
  4. if .$freq EQ .$fbak
  5.     unset fbak
  6.     quit
  7. endif
  8.  
  9. setenv freq `eval $freq`
  10.  
  11. if $freq GT 80000 VAL
  12.     setenv freq 80000
  13. endif
  14.  
  15. if 4000 GT $freq VAL
  16.     setenv freq 4000
  17. endif
  18.  
  19. unset fbak
  20. setenv fb "New freq!!"
  21. setenv gmch $gmpl
  22. break $gmpid
  23.